home *** CD-ROM | disk | FTP | other *** search
/ Aminet 35 / Aminet 35 (2000)(Schatztruhe)[!][Feb 2000].iso / Aminet / dev / e / cha_source.lha / cha_source / processor.e < prev    next >
Encoding:
Text File  |  1999-12-18  |  1.1 KB  |  34 lines
  1. /*==========================================================================+
  2. | processor.e                                                               |
  3. | abstract effects processor class                                          |
  4. +--------------------------------------------------------------------------*/
  5.  
  6. OPT MODULE
  7.  
  8. MODULE '*inputbuffer', '*outputbuffer'
  9.  
  10. /*-------------------------------------------------------------------------*/
  11.  
  12. EXPORT OBJECT processor
  13. PUBLIC
  14.     input  : PTR TO inputbuffer
  15.     output : PTR TO outputbuffer
  16. ENDOBJECT
  17.  
  18. PROC processor(input : PTR TO inputbuffer,
  19.                output : PTR TO outputbuffer) OF processor
  20.     self.input  := input
  21.     self.output := output
  22. ENDPROC
  23.  
  24. PROC end() OF processor
  25.     self.input  := NIL
  26.     self.output := NIL
  27. ENDPROC
  28.  
  29. PROC process() OF processor IS FALSE    -> WHILE fx.process() DO ...
  30.  
  31. /*--------------------------------------------------------------------------+
  32. | END: processor.e                                                          |
  33. +==========================================================================*/
  34.